home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Aminet 8
/
Aminet 8 (1995)(GTI - Schatztruhe)[!][Oct 1995].iso
/
Aminet
/
dev
/
m2
/
M2Pica.readme
< prev
Wrap
Text File
|
1995-09-20
|
11KB
|
291 lines
Short: Use the picasso gfxboard with Modula-2
Author: C.Wartmann@GANDALF.berlinet.de
Uploader: C.Wartmann@GANDALF.berlinet.de
Type: dev/m2
Use your Picasso II with Modula-2 ! Every function of vilintuisup.library
avaible via Modula-2 + fast ML Line-routines. Lots of demo programms.
FREEWARE, but please send me your suggestions/enhancements etc. via E-Mail.
Dokumentatation zu den Modula-2 Schnittstellenmodulen für die
Picasso Grafikkarte von VillageTronic.
*******************************************************************************
: Program. VilIntuiSupL.def
: Author. Carsten Wartmann (Crazy Video)
: Address. Wutzkyallee 83, 12353 Berlin
: Phone. 030/6614776
: E-Mail C.WARTMANN@GANDALF.berlinet.de
Carsten_Wartmann@tfh-berlin.de
: Version. 0.99c (0.99b)
: Date. 21.08.1995 (16.11.1994) (24.8.94) (22.Feb.1994)
: Copyright. Freeware
: Language. Modula-2
: Compiler. M2Amiga V4.3d
: Contents. Macht die VilIntuiSup.library für MODULA-2 (M2Amiga)
: Contents. Programmierer nutzbar.
*******************************************************************************)
Folgende Routinen stellt die VilIntuiSup.library zur Verfügung :
DEFINITION MODULE VilIntuiSupL{"vilintuisup.library",2} ;
FROM SYSTEM IMPORT ADDRESS,BYTE ;
FROM ExecD IMPORT ListPtr ;
FROM IntuitionD IMPORT ScreenPtr,RememberPtr ;
FROM UtilityD IMPORT TagItemPtr,Tag ;
IMPORT vil:VilIntuiSupD,R ;
(* Old function, do not use in future !!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!*)
PROCEDURE OpenVillageScreen(mode{R.A0} : vil.DimensionPtr) : ScreenPtr ;
CODE -30 ;
PROCEDURE OpenVillageScreenTagList(tags{R.A0} : TagItemPtr) : ScreenPtr ;
CODE -114 ;
PROCEDURE CloseVillageScreen(screen{R.A0} : ScreenPtr) ;
CODE -36 ;
PROCEDURE LockVillageScreen(screen{R.A0} : ScreenPtr) : ADDRESS ;
CODE -42 ;
PROCEDURE UnLockVillageScreen(screen{R.A0} : ScreenPtr) ;
CODE -48 ;
PROCEDURE GetMemSize(screen{R.A0} : ScreenPtr) : LONGCARD ;
CODE -72 ;
PROCEDURE VillageScreenData(screen{R.A0} : ScreenPtr ;
tag{R.D0} : Tag) : LONGCARD ;
CODE -120 ;
PROCEDURE IsVillageScreen(screen{R.A0} : ScreenPtr) : BOOLEAN ;
CODE -66 ;
PROCEDURE VillageRectFill(screen{R.A0} : ScreenPtr ;
fillrec{R.A1} : vil.VilFillRecordPtr) : LONGINT ;
CODE -78 ;
PROCEDURE VillageBlitCopy(screen{R.A0} : ScreenPtr ;
record{R.A1} : vil.VilCopyRecordPtr) ;
CODE -54 ;
PROCEDURE WaitVillageBlit ;
CODE -60 ;
PROCEDURE VillageModeRequest(tags{R.A0} : TagItemPtr) : LONGCARD ;
CODE -84 ;
PROCEDURE VillageModeList(memorykey{R.A0} : RememberPtr ;
tags{R.A1} : TagItemPtr) : ListPtr ;
CODE -90 ;
PROCEDURE VillageBestModeID(tags{R.A0} : TagItemPtr) : LONGCARD ;
CODE -108 ;
PROCEDURE VillageGetBufAddr(screen{R.A0} : ScreenPtr ;
num{R.D0} : LONGCARD) : ADDRESS ;
CODE -126 ;
PROCEDURE VillageSetDisplayBuf(screen{R.A0} : ScreenPtr ;
num{R.D0} : LONGCARD) ;
CODE -132 ;
PROCEDURE VillageSetSegment(segnum{R.D0} : LONGCARD) ;
CODE -96 ;
PROCEDURE VillageGetSegment ;
CODE -102 ;
END VilIntuiSupL.lib2
Ansonsten ist noch VilIntuiSupD.def aufschlussreich.
(*******************************************************************************
: Program. VilIntuiSupD.def
: Author. Carsten Wartmann (Crazy Video)
: Address. Wutzkyallee 83, 12353 Berlin
: Phone. 030/6614776
: E-Mail C.Wartmann@GANDALF.berlinet.de (bevorzugt)
: E-Mail Carsten_Wartmann@tfh-berlin.de
: Version. 1.0
: Date. 21.08.1995 (16.Nov.1994)
: Copyright. Freeware
: Language. Modula-2
: Compiler. M2Amiga V4.3d
: Contents. Macht die VilIntuiSup.library für MODULA-2 (M2Amiga)
: Contents. Programmierer nutzbar.
: Contents. Enthält Die Definitionen der Tags, Const. etc. für
: Contents. die VilIntuiSup.library
*******************************************************************************)
DEFINITION MODULE VilIntuiSupD ;
FROM ExecD IMPORT Node ;
FROM IntuitionD IMPORT ScreenPtr ;
FROM UtilityD IMPORT tagUser ;
FROM SYSTEM IMPORT ADDRESS,BYTE ;
IMPORT R;
[...] Definitionen gelöscht !!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
(* Support *)
(* Setze PP für 68000er *)
PROCEDURE SetPackedPixel(scr{R.A0} : ScreenPtr ; x{R.D2},y{R.D3} : CARDINAL ;
color{R.D4} : CARDINAL) ;
(* Setze TrueColorPixel *)
PROCEDURE SetTrueColorPixel(scr{R.A0} : ScreenPtr ; x{R.D2},y{R.D3} : CARDINAL ;
r{R.D4},g{R.D5},b{R.D6} : CARDINAL) ;
(* Setze 15(6)BitPixel *)
PROCEDURE Set15BitPixel(scr{R.A0} : ScreenPtr ; x{R.D2},y{R.D3} : CARDINAL ;
r{R.D4},g{R.D5},b{R.D6} : CARDINAL) ;
PROCEDURE Set16BitPixel(scr{R.A0} : ScreenPtr ; x{R.D2},y{R.D3} : CARDINAL ;
r{R.D4},g{R.D5},b{R.D6} : CARDINAL) ;
(* Linienroutinen *)
(* In Assembler aber mit Sicherheitsabfrage *)
PROCEDURE LinePacked(scr{R.A0} : ScreenPtr ; x1{R.D5},y1{R.D6},
x2{R.D2},y2{R.D3},color{R.D4} : LONGINT) ;
color{R.D4} : INTEGER) ;
PROCEDURE LineTrueColor(scr : ScreenPtr ; x1,y1,x2,y2,r,g,b : INTEGER) ;
PROCEDURE Line15Bit(scr : ScreenPtr ; x1,y1,x2,y2,r,g,b : INTEGER) ;
PROCEDURE Line16Bit(scr : ScreenPtr ; x1,y1,x2,y2,r,g,b : INTEGER) ;
(* Hi-Color Support*)
PROCEDURE Get15FromRGB(r{R.D4},g{R.D5},b{R.D6} : CARDINAL) : CARDINAL ;
PROCEDURE Get16FromRGB(r{R.D4},g{R.D5},b{R.D6} : CARDINAL) : CARDINAL ;
PROCEDURE Kreis(scr : ScreenPtr ; x,y,r,col : INTEGER) ;
PROCEDURE ClearScreen(scr : ScreenPtr) ;
PROCEDURE ClearBuf(scr : ScreenPtr ; bufadr : ADDRESS) ;
END VilIntuiSupD .
Hier nun eine detailiertere Beschreibung :
Tja, ist noch in Arbeit... Man schaue sich die Demos an.
Ansonsten wäre da noch die Doku von VT zur Vilintui, die Unterschiede
der Bezeichner erkennt man aus den defs etc.
Also *mir* reichen die Schnittstellen so wie sie jetzt sind. Wenn keine
Reaktion kommt ist das auch die letzte Veröffentlichung. Ohne
Anregungen/Kritik mache ich nicht weiter.
Ich bitte jeden mir eine E-Mail zu schreiben, der diese Soft benutzt.
(*
Zu sagen wäre noch, das anscheinend in der Software von VillageTronic noch
einige "Käfer" sind, so funktioniert z.B. das Blitten vom System-Mem ins
Graphic-Mem nicht (naja, wenn Enforcer läuft gehts manchmal...)
*)
Das funktioniert jetzt. Obwohl ich mehrmals VT auf diesen Fehler
hingewiesen habe kam keine Reaktion. Nach dem letzten Update der
Picasso-Soft ging es plötzlich !
Die Punktsetzroutinen und die Chunky-Pixelroutine sind in Assembler
implementiert und schneller als die C-Konstrukte von VT.
MfG Carsten.
============
============================= Archive contents =============================
Original Packed Ratio Date Time Name
-------- ------- ----- --------- -------- -------------
1276 526 58.7% 21-Aug-95 13:53:50 +Timer2.ob3
1280 526 58.9% 21-Apr-95 13:28:10 +Timer2.ob8
1520 592 61.0% 23-May-95 15:01:00 +Timer2.obj
5352 1685 68.5% 21-Apr-95 13:28:16 +VilIntuiSupD.ob8
5400 1716 68.2% 16-Nov-94 14:06:20 +VilIntuiSupD.obj
416 232 44.2% 21-Aug-95 13:53:46 +VilIntuiSupL.ob3
416 232 44.2% 21-Apr-95 13:28:10 +VilIntuiSupL.ob8
416 232 44.2% 16-Nov-94 14:06:14 +VilIntuiSupL.obj
5352 1685 68.5% 21-Aug-95 13:54:02 +VilIntuiSupD.ob3
21558 13091 39.2% 17-Aug-94 15:30:08 +Galerie160.bmp
4918 815 83.4% 17-Aug-94 22:06:36 +Kugeln.bmp
4918 772 84.3% 19-Aug-94 15:11:24 +Kugeln1.bmp
896 426 52.4% 19-Aug-94 15:08:10 +PAL.pal
10906 2924 73.1% 18-Aug-94 01:37:46 +Ship1.bmp
10294 2875 72.0% 19-Aug-94 15:10:14 +Ship2.bmp
328758 19063 94.2% 19-Aug-94 15:09:48 +Space1.bmp
10188 6050 40.6% 21-Aug-95 13:54:26 +Space030
2102 577 72.5% 19-Aug-94 15:51:12 +Explosion.bmp
9526 919 90.3% 19-Aug-94 15:10:52 +Ufo.bmp
270 185 31.4% 21-Aug-95 13:53:34 +Timer2.sym
798 249 68.7% 16-Nov-94 14:14:12 +Timer2.sym.info
17110 8749 48.8% 21-Aug-95 13:53:40 +VilIntuiSupD.sym
798 250 68.6% 16-Nov-94 14:06:10 +VilIntuiSupD.sym.info
14957 7952 46.8% 21-Aug-95 13:53:46 +VilIntuiSupL.sym
798 250 68.6% 16-Nov-94 14:06:14 +VilIntuiSupL.sym.info
2516 1440 42.7% 04-Aug-95 20:04:02 +IFF.sym
3298 1224 62.8% 21-Aug-95 13:52:28 +DBuf.mod
3727 1158 68.9% 21-Aug-95 13:52:28 +Picatest.mod
3766 1209 67.8% 21-Aug-95 13:52:28 +picatest15.mod
14712 3933 73.2% 21-Aug-95 13:53:24 +Space.mod
14710 3928 73.2% 21-Aug-95 13:52:28 +Space.modO
3678 1305 64.5% 21-Aug-95 13:52:28 +Styx.mod
7195 1921 73.3% 21-Aug-95 13:52:28 +vilintuisupD.def
17552 3481 80.1% 21-Aug-95 13:52:28 +VilIntuiSupD.mod
3288 2297 30.1% 16-Nov-94 14:28:44 +DBuf
378 160 57.6% 16-Nov-94 14:45:18 +DBuf.info
628 258 58.9% 16-Nov-94 14:45:18 +obj.info
4528 3029 33.1% 16-Nov-94 14:06:28 +PicaTest
378 157 58.4% 16-Nov-94 14:45:18 +PicaTest.info
3730 1206 67.6% 21-Aug-95 13:52:28 +picatest16.mod
3713 1164 68.6% 21-Aug-95 13:52:28 +Picatest8.mod
1016 458 54.9% 21-Aug-95 13:52:28 +Timer2.def
2435 1080 55.6% 21-Aug-95 13:52:28 +Timer2.mod
2932 911 68.9% 21-Aug-95 13:52:28 +vilintuisupL.def
4588 3090 32.6% 16-Nov-94 14:07:06 +PicaTest15
378 161 57.4% 16-Nov-94 14:45:18 +PicaTest15.info
4564 3081 32.4% 16-Nov-94 14:07:22 +PicaTest16
378 158 58.2% 16-Nov-94 14:45:18 +PicaTest16.info
3748 2313 38.2% 21-Apr-95 13:26:30 +PicaTest8
378 161 57.4% 16-Nov-94 14:45:18 +PicaTest8.info
628 258 58.9% 16-Nov-94 14:45:18 +Pics.info
378 159 57.9% 16-Nov-94 14:45:18 +Space030.info
3944 2651 32.7% 16-Nov-94 14:10:10 +Styx
378 161 57.4% 16-Nov-94 14:45:18 +Styx.info
628 260 58.5% 16-Nov-94 14:45:18 +sym.info
2868 581 79.7% 21-Aug-95 13:41:16 M2Pica.info
628 259 58.7% 16-Nov-94 14:45:18 +Txt.info
7278 2286 68.5% 21-Aug-95 12:28:48 +VilIntuiSup.DOK
358 265 25.9% 21-Aug-95 13:47:04 +VilIntuiSup.DOK.info
-------- ------- ----- --------- --------
585525 118736 79.7% 23-Aug-95 03:03:16 59 files